From fbefa1adf7eb829cc2d0160adb70f3092d51e0f3 Mon Sep 17 00:00:00 2001 From: Magnus Henoch Date: Wed, 15 Nov 2006 23:07:11 +0000 Subject: [PATCH] (url-http-wait-for-headers-change-function): Defer detection of HTTP 0.9 until we have at least one line. --- lisp/url/url-http.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 2fb90058b51..dc670188e26 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -933,7 +933,8 @@ the end of the document." (old-http nil) (content-length nil)) (goto-char (point-min)) - (if (not (looking-at "^HTTP/[1-9]\\.[0-9]")) + (if (and (looking-at ".*\n") ; have one line at least + (not (looking-at "^HTTP/[1-9]\\.[0-9]"))) ;; Not HTTP/x.y data, must be 0.9 ;; God, I wish this could die. (setq end-of-headers t -- 2.30.2